home *** CD-ROM | disk | FTP | other *** search
- Make Yourinfo Look Like This
- ``The Dragon Lord`` WWIVnet #1 AT 2575
- Wed Feb 10 19:58:59 1993
- ┌───────────────────────────────────────────────────────────────────────────┐
- │Mod Name: TDL05.MOD Mod Author : The Dragon Lord │
- │Difficulty:█▓▓▓▓▓▓▓ Date: 02-09-93 │
- │WWIV Version: 4.22 should work with all below │
- │Files affected: BBSUTL.C │
- │Description: This MOD will improve and colorize the look of the your │
- │ information screen so it looks something like below. │
- └───────────────────────────────────────────────────────────────────────────┘
-
- DISCLAMER: If anything goes wrong you didn't install this mod right.
-
-
-
- 7USER NAME: 2The Dragon Lord #1
-
-
- 7Sec lev 3 255 7D\l sec lev 3 255
- 7Last on 3 01/31/93 7Phone # 3 ###-###-####
- 7Times on3 69 7Dataphone # 3 ###-###-####
- 7On today3 2 7Mess. posted 3 100
- 7Mins on today3 55 7E-mail sent 3 100
- 7Mail waiting 3 5
-
-
- STEP #1 : BACKUP YOUR SOURCE!!!!!
- (ie. Pkzip -u wwivsrc *.c *.h *.mak)
-
- ╒══════════════════════╕
- │ Legend │
- ╞══════════════════════╡
- │ + Add Line │
- │ - Remove Line │
- │ = Existing line │
- ╘══════════════════════╛
-
- /*****************************************************************************/
- /* STEP #2: File: BBSUTL.C delete void yourinfo(void) & replace */
- /* with the following 3 voids */
- /*****************************************************************************/
-
- /********************************* BEGIN BLOCK *******************************/
-
- void blank_space(int j)
- {
- int i;
-
- for(i=0; i<j; i++)
- npr(" ");
- }
-
- void ansi_color(int i,int j)
- {
- npr("%d;3%dm",i,j);
- }
-
- void yourinfo(void)
- {
- int i;
-
- outchr(12);
- if (okansi()) {
- blank_space(14); ansi_color(1,4); npr("USER NAME: ");
- blank_space(5); ansi_color(1,1); npr("%s",nam(&thisuser,usernum));
- nl();nl();nl();
- blank_space(14); ansi_color(1,4); npr("Sec lev ");
- ansi_color(0,5); npr("%8d",thisuser.sl);
- blank_space(7); ansi_color(1,4); npr("D\\l sec lev ");
- ansi_color(0,5); npr("%12d\r\n",thisuser.dsl);
- if (actsl!=thisuser.sl) {
- blank_space(14); ansi_color(1,4); npr("Temp. s\\l");
- ansi_color(0,5); npr("%8d\r\n",actsl);
- }
- blank_space(14); ansi_color(1,4); npr("Last on ");
- ansi_color(0,5); npr("%8s",thisuser.laston);
- blank_space(7); ansi_color(1,4); npr("Phone #");
- blank_space(6); ansi_color(0,5); npr("%s\r\n",thisuser.phone);
- blank_space(14); ansi_color(1,4); npr("Times on ");
- ansi_color(0,5); npr("%8d",thisuser.logons);
- blank_space(7); ansi_color(1,4); npr("Dataphone # ");
- ansi_color(0,5); npr("%s\r\n",thisuser.dataphone);
- blank_space(14); ansi_color(1,4); npr("On today ");
- ansi_color(0,5); npr("%8d",thisuser.ontoday);
- blank_space(7); ansi_color(1,4); npr("Mess. posted ");
- ansi_color(0,5); npr("%12d\r\n",thisuser.msgpost);
- blank_space(14); ansi_color(1,4); npr("Mins on today");
- ansi_color(0,5); npr("%4ld",(long)((thisuser.timeon+timer()-timeon)/60.0));
- blank_space(7); ansi_color(1,4); npr("E-mail sent ");
- ansi_color(0,5); npr("%12d\r\n",
- (thisuser.emailsent+thisuser.feedbacksent+thisuser.emailnet));
- if (thisuser.waiting) {
- blank_space(14); ansi_color(1,4); npr("Mail waiting");
- ansi_color(0,5); npr("%5d",thisuser.waiting);
- } else
- npr("");
- nl();nl();nl();nl();
- } else {
- outstr(get_string(602)); pl(nam(&thisuser,usernum));
- outstr(get_string(603)); pl(thisuser.phone);
- if (thisuser.waiting) {
- outstr(get_string(365)); npr("%d\r\n",thisuser.waiting);
- }
- outstr(get_string(604)); npr("%d",thisuser.sl);
-
- if (actsl!=thisuser.sl) {
- outstr(get_string(605));
- npr("%d",actsl);
- pl(")");
- } else
- nl();
- outstr(get_string(606)); pln(thisuser.dsl);
- outstr(get_string(366)); pl(thisuser.laston);
- outstr(get_string(607)); pln(thisuser.logons);
- outstr(get_string(608)); pln(thisuser.ontoday);
- outstr(get_string(609)); pln(thisuser.msgpost);
- outstr(get_string(610));
- pln((thisuser.emailsent+thisuser.feedbacksent+thisuser.emailnet));
- outstr(get_string(611)); npr("%ld",(long)
- ((thisuser.timeon+timer()-timeon)/60.0));
- pl(get_string(612));
- nl();
- }
- }
- /********************************** END BLOCK ********************************/
-
- /*****************************************************************************/
- /* STEP #3: Compile!!! */
- /*****************************************************************************/
-
- If there any questions I can be reached at:
-
- THÉ DRÆGÖÑ's DÉÑ 1-2=3* 6<< 7THÉ DRÆGÖÑ £ÖRD 6>> 3*2=1-0
- (215)882-1415 1Fantasy 6Warez 3Ink.0
- WWIVNet 1@2575